3.1.95 \(\int \frac {(2-3 x+x^2) (d+e x+f x^2+g x^3+h x^4)}{(4-5 x^2+x^4)^2} \, dx\)

Optimal. Leaf size=131 \[ -\frac {d-e+f-g+h}{6 (x+1)}-\frac {d-2 e+4 f-8 g+16 h}{12 (x+2)}-\frac {1}{36} \log (1-x) (d+e+f+g+h)+\frac {1}{144} \log (2-x) (d+2 e+4 f+8 g+16 h)-\frac {1}{36} \log (x+1) (7 d-13 e+19 f-25 g+31 h)+\frac {1}{144} \log (x+2) (31 d-50 e+76 f-104 g+112 h) \]

________________________________________________________________________________________

Rubi [A]  time = 0.28, antiderivative size = 131, normalized size of antiderivative = 1.00, number of steps used = 3, number of rules used = 2, integrand size = 41, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.049, Rules used = {1586, 6728} \begin {gather*} -\frac {d-e+f-g+h}{6 (x+1)}-\frac {d-2 e+4 f-8 g+16 h}{12 (x+2)}-\frac {1}{36} \log (1-x) (d+e+f+g+h)+\frac {1}{144} \log (2-x) (d+2 e+4 f+8 g+16 h)-\frac {1}{36} \log (x+1) (7 d-13 e+19 f-25 g+31 h)+\frac {1}{144} \log (x+2) (31 d-50 e+76 f-104 g+112 h) \end {gather*}

Antiderivative was successfully verified.

[In]

Int[((2 - 3*x + x^2)*(d + e*x + f*x^2 + g*x^3 + h*x^4))/(4 - 5*x^2 + x^4)^2,x]

[Out]

-(d - e + f - g + h)/(6*(1 + x)) - (d - 2*e + 4*f - 8*g + 16*h)/(12*(2 + x)) - ((d + e + f + g + h)*Log[1 - x]
)/36 + ((d + 2*e + 4*f + 8*g + 16*h)*Log[2 - x])/144 - ((7*d - 13*e + 19*f - 25*g + 31*h)*Log[1 + x])/36 + ((3
1*d - 50*e + 76*f - 104*g + 112*h)*Log[2 + x])/144

Rule 1586

Int[(u_.)*(Px_)^(p_.)*(Qx_)^(q_.), x_Symbol] :> Int[u*PolynomialQuotient[Px, Qx, x]^p*Qx^(p + q), x] /; FreeQ[
q, x] && PolyQ[Px, x] && PolyQ[Qx, x] && EqQ[PolynomialRemainder[Px, Qx, x], 0] && IntegerQ[p] && LtQ[p*q, 0]

Rule 6728

Int[(u_)/((a_.) + (b_.)*(x_)^(n_.) + (c_.)*(x_)^(n2_.)), x_Symbol] :> With[{v = RationalFunctionExpand[u/(a +
b*x^n + c*x^(2*n)), x]}, Int[v, x] /; SumQ[v]] /; FreeQ[{a, b, c}, x] && EqQ[n2, 2*n] && IGtQ[n, 0]

Rubi steps

\begin {align*} \int \frac {\left (2-3 x+x^2\right ) \left (d+e x+f x^2+g x^3+h x^4\right )}{\left (4-5 x^2+x^4\right )^2} \, dx &=\int \frac {d+e x+f x^2+g x^3+h x^4}{\left (2-3 x+x^2\right ) \left (2+3 x+x^2\right )^2} \, dx\\ &=\int \left (\frac {d+2 e+4 f+8 g+16 h}{144 (-2+x)}+\frac {-d-e-f-g-h}{36 (-1+x)}+\frac {d-e+f-g+h}{6 (1+x)^2}+\frac {-7 d+13 e-19 f+25 g-31 h}{36 (1+x)}+\frac {d-2 e+4 f-8 g+16 h}{12 (2+x)^2}+\frac {31 d-50 e+76 f-104 g+112 h}{144 (2+x)}\right ) \, dx\\ &=-\frac {d-e+f-g+h}{6 (1+x)}-\frac {d-2 e+4 f-8 g+16 h}{12 (2+x)}-\frac {1}{36} (d+e+f+g+h) \log (1-x)+\frac {1}{144} (d+2 e+4 f+8 g+16 h) \log (2-x)-\frac {1}{36} (7 d-13 e+19 f-25 g+31 h) \log (1+x)+\frac {1}{144} (31 d-50 e+76 f-104 g+112 h) \log (2+x)\\ \end {align*}

________________________________________________________________________________________

Mathematica [A]  time = 0.06, size = 136, normalized size = 1.04 \begin {gather*} \frac {1}{144} \left (-\frac {12 (d (3 x+5)+2 (-e (2 x+3)+3 f x+4 f-5 g x-6 g+9 h x+10 h))}{x^2+3 x+2}-4 \log (1-x) (d+e+f+g+h)+\log (2-x) (d+2 (e+2 f+4 g+8 h))-4 \log (x+1) (7 d-13 e+19 f-25 g+31 h)+\log (x+2) (31 d-50 e+76 f-104 g+112 h)\right ) \end {gather*}

Antiderivative was successfully verified.

[In]

Integrate[((2 - 3*x + x^2)*(d + e*x + f*x^2 + g*x^3 + h*x^4))/(4 - 5*x^2 + x^4)^2,x]

[Out]

((-12*(d*(5 + 3*x) + 2*(4*f - 6*g + 10*h + 3*f*x - 5*g*x + 9*h*x - e*(3 + 2*x))))/(2 + 3*x + x^2) - 4*(d + e +
f + g + h)*Log[1 - x] + (d + 2*(e + 2*f + 4*g + 8*h))*Log[2 - x] - 4*(7*d - 13*e + 19*f - 25*g + 31*h)*Log[1
+ x] + (31*d - 50*e + 76*f - 104*g + 112*h)*Log[2 + x])/144

________________________________________________________________________________________

IntegrateAlgebraic [F]  time = 0.00, size = 0, normalized size = 0.00 \begin {gather*} \int \frac {\left (2-3 x+x^2\right ) \left (d+e x+f x^2+g x^3+h x^4\right )}{\left (4-5 x^2+x^4\right )^2} \, dx \end {gather*}

Verification is not applicable to the result.

[In]

IntegrateAlgebraic[((2 - 3*x + x^2)*(d + e*x + f*x^2 + g*x^3 + h*x^4))/(4 - 5*x^2 + x^4)^2,x]

[Out]

IntegrateAlgebraic[((2 - 3*x + x^2)*(d + e*x + f*x^2 + g*x^3 + h*x^4))/(4 - 5*x^2 + x^4)^2, x]

________________________________________________________________________________________

fricas [B]  time = 14.85, size = 267, normalized size = 2.04 \begin {gather*} -\frac {12 \, {\left (3 \, d - 4 \, e + 6 \, f - 10 \, g + 18 \, h\right )} x - {\left ({\left (31 \, d - 50 \, e + 76 \, f - 104 \, g + 112 \, h\right )} x^{2} + 3 \, {\left (31 \, d - 50 \, e + 76 \, f - 104 \, g + 112 \, h\right )} x + 62 \, d - 100 \, e + 152 \, f - 208 \, g + 224 \, h\right )} \log \left (x + 2\right ) + 4 \, {\left ({\left (7 \, d - 13 \, e + 19 \, f - 25 \, g + 31 \, h\right )} x^{2} + 3 \, {\left (7 \, d - 13 \, e + 19 \, f - 25 \, g + 31 \, h\right )} x + 14 \, d - 26 \, e + 38 \, f - 50 \, g + 62 \, h\right )} \log \left (x + 1\right ) + 4 \, {\left ({\left (d + e + f + g + h\right )} x^{2} + 3 \, {\left (d + e + f + g + h\right )} x + 2 \, d + 2 \, e + 2 \, f + 2 \, g + 2 \, h\right )} \log \left (x - 1\right ) - {\left ({\left (d + 2 \, e + 4 \, f + 8 \, g + 16 \, h\right )} x^{2} + 3 \, {\left (d + 2 \, e + 4 \, f + 8 \, g + 16 \, h\right )} x + 2 \, d + 4 \, e + 8 \, f + 16 \, g + 32 \, h\right )} \log \left (x - 2\right ) + 60 \, d - 72 \, e + 96 \, f - 144 \, g + 240 \, h}{144 \, {\left (x^{2} + 3 \, x + 2\right )}} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((x^2-3*x+2)*(h*x^4+g*x^3+f*x^2+e*x+d)/(x^4-5*x^2+4)^2,x, algorithm="fricas")

[Out]

-1/144*(12*(3*d - 4*e + 6*f - 10*g + 18*h)*x - ((31*d - 50*e + 76*f - 104*g + 112*h)*x^2 + 3*(31*d - 50*e + 76
*f - 104*g + 112*h)*x + 62*d - 100*e + 152*f - 208*g + 224*h)*log(x + 2) + 4*((7*d - 13*e + 19*f - 25*g + 31*h
)*x^2 + 3*(7*d - 13*e + 19*f - 25*g + 31*h)*x + 14*d - 26*e + 38*f - 50*g + 62*h)*log(x + 1) + 4*((d + e + f +
g + h)*x^2 + 3*(d + e + f + g + h)*x + 2*d + 2*e + 2*f + 2*g + 2*h)*log(x - 1) - ((d + 2*e + 4*f + 8*g + 16*h
)*x^2 + 3*(d + 2*e + 4*f + 8*g + 16*h)*x + 2*d + 4*e + 8*f + 16*g + 32*h)*log(x - 2) + 60*d - 72*e + 96*f - 14
4*g + 240*h)/(x^2 + 3*x + 2)

________________________________________________________________________________________

giac [A]  time = 0.33, size = 133, normalized size = 1.02 \begin {gather*} \frac {1}{144} \, {\left (31 \, d + 76 \, f - 104 \, g + 112 \, h - 50 \, e\right )} \log \left ({\left | x + 2 \right |}\right ) - \frac {1}{36} \, {\left (7 \, d + 19 \, f - 25 \, g + 31 \, h - 13 \, e\right )} \log \left ({\left | x + 1 \right |}\right ) - \frac {1}{36} \, {\left (d + f + g + h + e\right )} \log \left ({\left | x - 1 \right |}\right ) + \frac {1}{144} \, {\left (d + 4 \, f + 8 \, g + 16 \, h + 2 \, e\right )} \log \left ({\left | x - 2 \right |}\right ) - \frac {{\left (3 \, d + 6 \, f - 10 \, g + 18 \, h - 4 \, e\right )} x + 5 \, d + 8 \, f - 12 \, g + 20 \, h - 6 \, e}{12 \, {\left (x + 2\right )} {\left (x + 1\right )}} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((x^2-3*x+2)*(h*x^4+g*x^3+f*x^2+e*x+d)/(x^4-5*x^2+4)^2,x, algorithm="giac")

[Out]

1/144*(31*d + 76*f - 104*g + 112*h - 50*e)*log(abs(x + 2)) - 1/36*(7*d + 19*f - 25*g + 31*h - 13*e)*log(abs(x
+ 1)) - 1/36*(d + f + g + h + e)*log(abs(x - 1)) + 1/144*(d + 4*f + 8*g + 16*h + 2*e)*log(abs(x - 2)) - 1/12*(
(3*d + 6*f - 10*g + 18*h - 4*e)*x + 5*d + 8*f - 12*g + 20*h - 6*e)/((x + 2)*(x + 1))

________________________________________________________________________________________

maple [A]  time = 0.01, size = 222, normalized size = 1.69 \begin {gather*} \frac {7 h \ln \left (x +2\right )}{9}-\frac {h \ln \left (x -1\right )}{36}-\frac {31 h \ln \left (x +1\right )}{36}+\frac {h \ln \left (x -2\right )}{9}-\frac {g \ln \left (x -1\right )}{36}-\frac {13 g \ln \left (x +2\right )}{18}+\frac {g \ln \left (x -2\right )}{18}+\frac {25 g \ln \left (x +1\right )}{36}+\frac {31 d \ln \left (x +2\right )}{144}-\frac {25 e \ln \left (x +2\right )}{72}-\frac {e \ln \left (x -1\right )}{36}-\frac {d \ln \left (x -1\right )}{36}+\frac {13 e \ln \left (x +1\right )}{36}-\frac {7 d \ln \left (x +1\right )}{36}+\frac {d \ln \left (x -2\right )}{144}+\frac {e \ln \left (x -2\right )}{72}+\frac {f \ln \left (x -2\right )}{36}-\frac {19 f \ln \left (x +1\right )}{36}-\frac {f \ln \left (x -1\right )}{36}+\frac {19 f \ln \left (x +2\right )}{36}+\frac {g}{6 x +6}+\frac {e}{6 x +6}+\frac {e}{6 x +12}-\frac {4 h}{3 \left (x +2\right )}-\frac {h}{6 \left (x +1\right )}+\frac {2 g}{3 \left (x +2\right )}-\frac {d}{12 \left (x +2\right )}-\frac {d}{6 \left (x +1\right )}-\frac {f}{3 \left (x +2\right )}-\frac {f}{6 \left (x +1\right )} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int((x^2-3*x+2)*(h*x^4+g*x^3+f*x^2+e*x+d)/(x^4-5*x^2+4)^2,x)

[Out]

7/9*h*ln(x+2)-1/36*h*ln(x-1)-31/36*h*ln(x+1)+1/9*h*ln(x-2)-1/36*g*ln(x-1)-13/18*g*ln(x+2)+1/18*g*ln(x-2)+25/36
*g*ln(x+1)+31/144*d*ln(x+2)-25/72*e*ln(x+2)-1/36*e*ln(x-1)-1/36*d*ln(x-1)+13/36*e*ln(x+1)-7/36*d*ln(x+1)+1/144
*d*ln(x-2)+1/72*e*ln(x-2)+1/36*f*ln(x-2)-19/36*f*ln(x+1)-1/36*f*ln(x-1)+19/36*f*ln(x+2)-4/3/(x+2)*h-1/6/(x+1)*
h+2/3/(x+2)*g+1/6/(x+1)*g-1/12/(x+2)*d+1/6/(x+2)*e-1/6/(x+1)*d+1/6/(x+1)*e-1/3/(x+2)*f-1/6/(x+1)*f

________________________________________________________________________________________

maxima [A]  time = 0.45, size = 123, normalized size = 0.94 \begin {gather*} \frac {1}{144} \, {\left (31 \, d - 50 \, e + 76 \, f - 104 \, g + 112 \, h\right )} \log \left (x + 2\right ) - \frac {1}{36} \, {\left (7 \, d - 13 \, e + 19 \, f - 25 \, g + 31 \, h\right )} \log \left (x + 1\right ) - \frac {1}{36} \, {\left (d + e + f + g + h\right )} \log \left (x - 1\right ) + \frac {1}{144} \, {\left (d + 2 \, e + 4 \, f + 8 \, g + 16 \, h\right )} \log \left (x - 2\right ) - \frac {{\left (3 \, d - 4 \, e + 6 \, f - 10 \, g + 18 \, h\right )} x + 5 \, d - 6 \, e + 8 \, f - 12 \, g + 20 \, h}{12 \, {\left (x^{2} + 3 \, x + 2\right )}} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((x^2-3*x+2)*(h*x^4+g*x^3+f*x^2+e*x+d)/(x^4-5*x^2+4)^2,x, algorithm="maxima")

[Out]

1/144*(31*d - 50*e + 76*f - 104*g + 112*h)*log(x + 2) - 1/36*(7*d - 13*e + 19*f - 25*g + 31*h)*log(x + 1) - 1/
36*(d + e + f + g + h)*log(x - 1) + 1/144*(d + 2*e + 4*f + 8*g + 16*h)*log(x - 2) - 1/12*((3*d - 4*e + 6*f - 1
0*g + 18*h)*x + 5*d - 6*e + 8*f - 12*g + 20*h)/(x^2 + 3*x + 2)

________________________________________________________________________________________

mupad [B]  time = 1.33, size = 133, normalized size = 1.02 \begin {gather*} \ln \left (x-2\right )\,\left (\frac {d}{144}+\frac {e}{72}+\frac {f}{36}+\frac {g}{18}+\frac {h}{9}\right )-\ln \left (x-1\right )\,\left (\frac {d}{36}+\frac {e}{36}+\frac {f}{36}+\frac {g}{36}+\frac {h}{36}\right )-\ln \left (x+1\right )\,\left (\frac {7\,d}{36}-\frac {13\,e}{36}+\frac {19\,f}{36}-\frac {25\,g}{36}+\frac {31\,h}{36}\right )-\frac {\frac {5\,d}{12}-\frac {e}{2}+\frac {2\,f}{3}-g+\frac {5\,h}{3}+x\,\left (\frac {d}{4}-\frac {e}{3}+\frac {f}{2}-\frac {5\,g}{6}+\frac {3\,h}{2}\right )}{x^2+3\,x+2}+\ln \left (x+2\right )\,\left (\frac {31\,d}{144}-\frac {25\,e}{72}+\frac {19\,f}{36}-\frac {13\,g}{18}+\frac {7\,h}{9}\right ) \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(((x^2 - 3*x + 2)*(d + e*x + f*x^2 + g*x^3 + h*x^4))/(x^4 - 5*x^2 + 4)^2,x)

[Out]

log(x - 2)*(d/144 + e/72 + f/36 + g/18 + h/9) - log(x - 1)*(d/36 + e/36 + f/36 + g/36 + h/36) - log(x + 1)*((7
*d)/36 - (13*e)/36 + (19*f)/36 - (25*g)/36 + (31*h)/36) - ((5*d)/12 - e/2 + (2*f)/3 - g + (5*h)/3 + x*(d/4 - e
/3 + f/2 - (5*g)/6 + (3*h)/2))/(3*x + x^2 + 2) + log(x + 2)*((31*d)/144 - (25*e)/72 + (19*f)/36 - (13*g)/18 +
(7*h)/9)

________________________________________________________________________________________

sympy [F(-1)]  time = 0.00, size = 0, normalized size = 0.00 \begin {gather*} \text {Timed out} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((x**2-3*x+2)*(h*x**4+g*x**3+f*x**2+e*x+d)/(x**4-5*x**2+4)**2,x)

[Out]

Timed out

________________________________________________________________________________________